1 IFA>.THEN6 2 POKE53280,.:POKE53281,.:POKE53272,23 3 PRINTCHR$(142)"[147] [212]HE HORSES SLOWLY APPROACH THE GATE... 6 [139]A[178].[167]A[178]1:[147]"RACING.FNT",8,1 7 [139]A[178]1[167]A[178]2:[147]"RACING.WRD",8,1 8 [151]53272,([194](53272)[175]240)[176]14:[141]60100:[151]55,255:[151]56,55:[156] 9 SP$[178]" ":[134] W(9) 10 S1[178]1064:SW[178]40:V[178]10:F6[178]55296:[153]"LOAD":AM[178]5000 20 VV[178]54296:WW[178]54276:AA[178]54277:HF[178]54273:LF[178]54272:PH[178]54275:PL[178]54274 :S[178]54278 30 S$[178]"AND":F$[178]"USR":[129] T[178]1[164]SW[171]V[170]1:A$[178]A$[170]S$:B$[178]B$[170]F$:[130] 40 [140]:A[178][187]([171]TI) 41 [129]T[178]1[164]9:B(T)[178][181]([187](1)[172]5)[170]2:TA[178]TA[170]B(T):M(T)[178]0:[135]N$(T):[130] 42 [153]"LOAD P A R I - M U T U E L" 43 [153]"";:[129]A[178]1[164]3:[153][163]5)" ":[130] 44 SC[178]1024[170]45:[141]9000 45 [153]" BY DEAN S. ROSSA" 47 [153]"SYS *** PLACE YOUR BETS ***" 50 [153]"  HORSE ODDS WINS " 60 [129]T[178]1[164]9:[153][163]3)""T;"CONT"N$(T)[163]19)[181](TA[173]B(T));[163]23);"TO CONT1"; 63 [153][163]32)W(T):[130] 65 [153]" PRESS 0 TO QUIT." 70 [153]" ON WHICH HORSE WOULD YOU LIKE TO BET?" 75 [161]A$:[139]A$[179]"0"[176]A$[177]"9"[167]75 76 [139]A$[178]"0"[167][141]60000:[137]70 77 H[178][197](A$) 78 [153]"ONONON";:[129]A[178]1[164]4:[153]SP$:[130] 80 [153]"ONONONENTER 0 TO RE-CHOOSE A HORSE." 82 [153]" YOU HAVE $"AM"CMD." 85 [153]" ENTER YOUR BET: CMDCMDCMDCMDCMDCMDCMD";:[141]60500:B[178][197](B$) 86 [139]B[177].[175]B[179][178]AM[167]90 87 [139]B[178].[167][153]"ONONON";:[129]A[178]1[164]4:[153]SP$:[130]:[137]65 88 [153]" INVALID AMOUNT!ON":[129]A[178]1[164]2000:[130]:[153]" ONON":[137]85 90 [153]"LOADVERIFY ORTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTAN^" 92 [129]A[178]1[164]9:[153]" (null)"[166]29)"STOPSPC( SPC(VERIFY(null)"A:[130] 94 [153]" /TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANEXP" 95 [153]""[163]32)"FCMDICMDNCMDICMDSCMDH" 97 AM[178]AM[171]B 100 WC[178][181]([187](1)[172]9)[170]1:B(WC)[178][181]([187](1)[172]3)[170]5 :[129]A[178]S1 [164]S1[170]8[172]SW [169] SW 110 I[178]I[170]1:A(I)[178]A:[151]A,28:[151]A[170]F64[171]1024,28:[151]A[171]1024[170]F64,0:[130] 120 [129] T[178]1[164]14:[151]VV,15:[151]AA,88:[151]PH,15:[151]PL,15:[151]S,89 130 [135]HI,LO,FE:[151] HF,HI:[151]LF,LO:[151]WW,65:[129]Q[178]1[164]FE:[130]:[151]WW,64 140 [130]T:B[178][182](B):[153]"YOU BET"B"ON HORSE CONT#" H"- "N$(H)"." 145 [153]"CLR AND THEY'RE OFF!" 150 X[178][181]([187](1)[172]9)[170]1 :C[178]B(X)[173]2:Z[178]1024:[139] M(X)[178]0[167][151]A(X)[170]1,32 160 A(X)[178]A(X)[170]C:[151]A(X),28:[151]A(X)[171]Z[170]F6,28:[151]A(X)[171]Z[170]F6,0 170 M(X)[178]M(X)[170]C:[151]A(X)[171]C,32:[151]A(X)[171]C[171]Z[170]F6,32:[139] M(X)[177][178]SW[171](V[171]1)[167]200 180 [129]T[178]1[164]3: [151]VV,15:[151] HF,40 :[151]LF, 200:[151]WW,129 : 190 [129]TT[178]1 [164] 10[172]KK: [130]:[151]WW,0:[151]AA,0:[130] : [137]150 200 [153]"#"X;N$(X);" IS THE WINNER.":WL$[178]"LOST":MM[178]B:W(X)[178]W(X)[170]1 205 [139]X[178]H[167]AM[178]AM[170]B:W[178][181](TA[173]B(X))[172]B:WL$[178]"WON":AM[178]AM[170]W:MM[178]W 210 [153] "YOU "WL$" $"MM"ON THAT RACE." 215 [153]"YOU NOW HAVE A TOTAL OF $"AM"CMD." 217 [153]" PRESS SPACE TO CONTINUE." 220 [139][194](203)[179][177]60[167]220 230 I[178]0:TA[178]0:[139]AM[177].[167]40 231 [153]"LOADOH NO! YOU BLEW ALL YOUR MONEY!!":[129]A[178]1[164]2000:[130] 232 [153]"GOOD THING THIS IS JUST A GAME ...":[129]A[178]1[164]2000:[130] 234 [153]"HOLD ON WHILE I RE-FILL YOUR POCKETS...":[153]:[151]54296,15 236 [129]A[178]0[164]5000[169]50:[153]"ON$"A:[151]54276,.:[151]54277,13:[151]54278,13 237 [151]54273,A[173]20:[151]54276,17:[130]:[151]54278,10:[151]54277,10 239 AM[178]5000:[137]217 240 [131]SCAMP,JUNEBUG,BETA BITS,ROCKY,EIGHT BALL,PIP,CHUTNEY,CHEERIO,SAM 250 [131]16,195,150,22,96,150,28,49,150,33,135,150,33,135,50,33 260 [131]135,50,33,135,150,28,49,50,28,49,50,28,49,150,22,96,150,28 270 [131]49,150,22,96,150,16,195,150 9000 [129]A[178].[164]29:[151]SC[170]A,[194](49152[170]A) 9010 [151]SC[170]40[170]A,[194](49152[170]30[170]A) 9020 [151]SC[170]80[170]A,[194](49152[170]60[170]A) 9030 [130]:[142] 60000 [153]"ON ARE YOU SURE YOU WANT TO QUIT? (Y/N) " 60010 A[178][194](203):[139]A[179][177]25[175]A[179][177]39[167]60010 60020 [139]A[178]39[167][153]"ON ON":[142] 60030 [159]15,8,15,"R0:HELLO CONNECT=HELLO CONNECT":[132]15,ER:[160]15 60040 [139]ER[179][177]63[167][128] 60050 [153]"LOAD":[151]53272,21:[151]55,.:[151]56,160 60060 [147] "HELLO CONNECT",8 60100 [151]53280,1:[151]53281,1 60110 [153]"LOAD(null)TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANRIGHT$"; 60120 [129]A[178]1[164]23:[153]"(null)"[166]38)"(null)";:[130] 60130 [153]"MID$TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTAN(null)CMDSAVETAN" 60135 [129]A[178]217[164]242:[151]A,[194](A)[176]128:[130] 60140 [153]" LOADSTAR PRESENTS:" 60150 [153]"  " 60160 [153]"  P A R I ! M U T U E L PRINT# " 60170 [153]"  PRINT# " 60180 [153]"  PRINT# " 60190 [153]"  PRINT# " 60200 [153]"  PRINT# " 60210 [153]"  PRINT# ":SC[178]1024[170]5[170]9[172]40:[141]9000 60220 [153]"  BY DEAN ROSSA PRINT# " 60230 [153]"  PRINT# " 60240 [153]"  COPYRIGHT \]^_ PRINT# " 60250 [153]"  PRINT# " 60260 [153]"  " 60270 [153]" PRESS SPACE TO CONTINUE" 60280 [139][194](203)[179][177]60[167]60280 60290 [142] 60500 [153]"TO";:B$[178]"":[129]A[178]1[164]6 60510 [161]A$:[139]A$[178]""[167]60510 60520 [139]A$[178][199](13)[167]60580 60530 [139]A$[178][199](20)[175]A[177]1[167]A[178]A[171]1:[153]"CMDCMD CMDCMDTO";:B$[178][200](B$,A[171]1):[137]60510 60540 [139]A[178]6[167]60510 60550 [139]A$[177][178]"0"[175]A$[179][178]"9"[167]60570 60560 [137]60510 60570 [153]"CMD"A$"TO";:B$[178]B$[170]A$:[130] 60580 [153]"CMD ":[142]